@ECHO OFF
::Variables
set Name=Und
set Gender=Und
set Age=Und
set Gold=0
set Hunger=Satisfied
set Illness=None
set Wounds=None
set CHP=10
set MHP=10
set CMP=0
set MMP=0
set DMG=1
set DFN=0
set INT=1
set DEX=1
set STR=1
goto Start
::Stats 
:Stats
cls
echo    Name: %Name%
echo  Gender: %Gender%
echo     Age: %Age%
echo    Gold: %Gold%
echo.
echo Health
echo  Hunger: %Hunger%
echo Illness: %Illness%
echo  Wounds: %Wounds%
echo.
echo Stats
echo      HP: %CHP%/%MHP%
echo      MP: %CMP%/%MMP%
set /p continue= :
if "%continue%"=="start" goto Start
::Testing section for code.
:Test
cls 
echo %AgeStart% age %Age%
pause
:Start
cls
echo. 		
echo 			The Longest Road
echo		 	Copyright (c)2014 Douglas A. Davis (Kreinas)
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo Would you like to 
echo.
echo 1) Begin
echo 2) Tutorial
echo.
echo.
echo.
set /p tutorial= :
if "%tutorial%"=="1" Goto Name
if "%tutorial%"=="2" Goto Tutorial
if "%tutorial%"=="Debug" Goto Stats2
goto Start
::This is the Tutorial Section
:Tutorial
cls
echo The Longest Road is an interactive fiction novel in which YOU as the player 
echo decide the course of events. In each scenario, you will be provided background 
echo info, and choices available for you to take. To make your choice, simply do as
echo you have already done. Choices you make will affect the outcome of the rest of 
echo the game. Enter the answer corresponding to the decision you would like to make.
echo The novel will continue down the path you have chosen. 

echo Do you understand?
echo 1) Yes
echo 2) No
set /p Understand= :
if "%Understand%"=="1" goto Name
if "%Understand%"=="2" goto Failure
goto Tutorial
::This is the Failure section. Only the tutorial leads here.
:Failure
cls
echo.
echo.
echo It seems you aren't able to enjoy this novel for one of the following reasons:
echo.
echo 1) You simply are too incompetent to enter numbers.
echo 2) You are illiterate and can't read
echo 3) You didn't think No would actually have a resolution. You were wrong.
echo.
echo.
echo Think you can handle this now?
echo 1) Yes
echo 2) No
set /p Failure= :
if "%Failure%"=="1" goto Name
if "%Failure%"=="2" EXIT
::This is the Character Creation section. Character details will be managed here.
::Name Section
:Name
cls
echo What is your name?
set /p Name= :
if "%Name%"=="Test" set "%Gold%"
goto Gender
::Gender Section
:Gender
cls
echo Okay, %Name%, are you a Male or a Female?
set /p Gender= :
if "%Gender%"=="Male" goto Age
if "%Gender%"=="Female" goto Age
goto Gender
::Age Section
:Age
cls
set AgeStart=Adult
echo And how old are you, %Name%?
set /p Age= :
if "%Age%"=="1" set AgeStart=Child
if "%Age%"=="2" set AgeStart=Child
if "%Age%"=="3" set AgeStart=Child
if "%Age%"=="4" set AgeStart=Child
if "%Age%"=="5" set AgeStart=Child
if "%Age%"=="6" set AgeStart=Child
if "%Age%"=="7" set AgeStart=Child
if "%Age%"=="8" set AgeStart=Child
if "%Age%"=="9" set AgeStart=Child
if "%Age%"=="10" set AgeStart=Child
if "%Age%"=="11" set AgeStart=Child
if "%Age%"=="12" set AgeStart=Child
if "%Age%"=="13" set AgeStart=Teen
if "%Age%"=="14" set AgeStart=Teen
if "%Age%"=="15" set AgeStart=Teen
if "%Age%"=="16" set AgeStart=Teen
if "%Age%"=="17" set AgeStart=Teen
::This is the Intro
:Intro
cls
echo.
echo   Velkadia. A sinister corner of the world, all but forgotten by the world. 
echo Due  to numerous wars, a corrupted nobility, a power hungry middle-class, and
echo impoverished  workers, Velkadia has become isolated from the other realms of
echo existance. As a result, Veldakian technology has remained far behind what one
echo might expect, and travel between realms is only a fantasy for the people there. 

echo   Furthermore, the Gods have chosen to turn their back on this realm. Though
echo there are a few believers who still worship and revere the Gods, most denizens 
echo of this realm have forgotten the Gods. Their power has not graced the realm in
echo centuries.

echo   It truly is a dark realm, but you, %Name%, much like the other denizens, have
echo somehow managed to move on in life, despite the struggles. 
echo.
echo.
echo Speaking of which, how DID you grow up in this world?
echo 1) I was abandoned
echo 2) Born to beggars
echo 3) Born to farmers
echo 4) Born to merchants
echo 5) Born to a soldier
echo 6) Born to nobles
echo 7) Born to royalty
set /p Intro= :
if %Intro%==1 goto Intro1
if %Intro%==2 goto Intro2
if %Intro%==3 goto Intro3
if %Intro%==4 goto Intro4
if %Intro%==5 goto Intro5
if %Intro%==6 goto Intro6
if %Intro%==7 goto Intro7
goto Intro
::Abandonment intro
:Intro1
cls
echo Oh, so you were abandoned as a child? How unfortunate. Please forgive me, I
echo didn't intend to bring up such such memories. Anyways. As a child in 
pause
::Beggar intro
:Intro2
::Farmer intro
:Intro3
::Merchant intro
:Intro4
::Soldier intro
:Intro5
::Nobility intro
:Intro6
::Royalty intro
:intro7





